home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Monster Media 1996 #15
/
Monster Media Number 15 (Monster Media)(July 1996).ISO
/
maximus
/
stbar20.zip
/
GETDESC.BAT
< prev
next >
Wrap
DOS Batch File
|
1996-04-11
|
2KB
|
93 lines
@echo off
rem ====--=StarBar V2.00=--===--=DIZ & SDN.ID Descriptor File Grabber=--====
rem DOS BAT
rem
rem ====--=Usage=--====
rem
rem first parameter : StarBar Work Path
rem second parameter : Full path and Filename to be examined
rem
rem ========================================================================
rem
rem After each node has used StarBar at least once, the next line may be
rem removed...
md %1
cd %1
if exist %1\*.arj goto ARJ
if exist %1\*.zip goto ZIP
if exist %1\*.lzh goto LHA
if exist %1\*.rar goto UNRAR
if exist %1\*.arc goto PKUNPAK
if exist %1\*.zoo goto ZOO
if exist %1\*.pak goto PAK
rem Add any other archivers you wish to support here, then follow the
rem examples below on extracting the info...
rem Be sure to include any switches which OVERRIDE EMBEDDED PATHS!
goto end
:ARJ
arj e -y %2 file_id.diz
if exist %1\file_id.diz ren %1\file_id.diz descfile.txt
if exist %1\descfile.txt goto end
arj e -y %2 sdn.id
if exist %1\sdn.id ren %1\sdn.id descfile.txt
goto end
:ZIP
pkunzip -o %2 file_id.diz
if exist %1\file_id.diz ren %1\file_id.diz descfile.txt
if exist %1\descfile.txt goto end
pkunzip -o %2 sdn.id
if exist %1\sdn.id ren %1\sdn.id descfile.txt
goto end
:LHA
lha e /m+c+ %2 file_id.diz
if exist %1\file_id.diz ren %1\file_id.diz descfile.txt
if exist %1\descfile.txt goto end
lha e /m+c+ %2 sdn.id
if exist %1\sdn.id ren %1\sdn.id descfile.txt
goto end
:UNRAR
unrar e -o+ %2 file_id.diz
if exist %1\file_id.diz ren %1\file_id.diz descfile.txt
if exist %1\descfile.txt goto end
unrar e -o+ %2 sdn.id
if exist %1\sdn.id ren %1\sdn.id descfile.txt
goto end
:PKUNPAK
pkunpak -r %2 file_id.diz
if exist %1\file_id.diz ren %1\file_id.diz descfile.txt
if exist %1\descfile.txt goto end
pkunpak -r %2 sdn.id
if exist %1\sdn.id ren %1\sdn.id descfile.txt
goto end
:ZOO
zoo e %2 file_id.diz
if exist %1\file_id.diz ren %1\file_id.diz descfile.txt
if exist %1\descfile.txt goto end
zoo e %2 sdn.id
if exist %1\sdn.id ren %1\sdn.id descfile.txt
goto end
:PAK
pak e/WA %2 file_id.diz
if exist %1\file_id.diz ren %1\file_id.diz descfile.txt
if exist %1\descfile.txt goto end
pak e/WA %2 sdn.id
if exist %1\sdn.id ren %1\sdn.id descfile.txt
goto end
:end
rem =--=If no descriptor is found, StarBar will expand the full original=--=
rem =--=FILES.BBS description and display that...=--=